home *** CD-ROM | disk | FTP | other *** search
/ Amiga Packmags / NewsFlash - Issue 07 (1990-01)(UGA - 17-Bit Software)(Disk 1 of 2)[a intro].zip / NewsFlash - Issue 07 (1990-01)(UGA - 17-Bit Software)(Disk 1 of 2)[a intro].adf / s / startup-sequence < prev   
Text File  |  1996-12-24  |  3KB  |  97 lines
  1. ;                              
  2. ;        Startup Sequence For Newsflash Issue 7  1990
  3. ;
  4. ;  
  5. ;  First we had better check that there are no nasty virii lurking in
  6. ;  the machine.. we can run PvLs handy little virus hunter/killer.
  7. ;  If any virii is found in memory then you are told what type..
  8.  
  9. vhunt 
  10.  
  11. ;  To neaten things up a little we black out the Cli display, and it is
  12. ;  lit back up later after showing the picture or setting the prefs..
  13.  
  14. ECHO "UGA WILL BE ON THE HCC IN ANTWERP (BELGIUM)!!! SO IF YOU WANT  "
  15. ECHO "TO MEET US PERSONALLY VISIT OUR STAND ON FRI-DAY 9TH FEBRUAR "
  16. ECHO "IF YOU HAVE SOMETHING FOR OUR PD SERIE TAKE IT WITH YOU. "
  17. ECHO ""
  18. ECHO "ALSO IF YOU ARE BUSY WITH COMMERCIAL SOFTWARE HAVE A CHAT WITH US"
  19. ECHO ""
  20. ECHO ""
  21. ECHO ""
  22.  
  23.  
  24. black
  25.  
  26. ;  Now to change the font from that horrible Topaz font to a much cleaner
  27. ;  neater font (Siesta)... Plus it also speeds Text Display up! :-)
  28.  
  29. ff siesta.font
  30.  
  31. ;  More neatness touches, this one loses the edge border and makes the 
  32. ;  overall appearance more enhanced and professional (in my opinion).
  33.  
  34. border off
  35.  
  36. ;  This is a cute trick, using the echo command and some control characters
  37. ;  we turn off the cursor and text colors, purely for presentation.
  38. ;  The Control characters will not be shown via PPmore though.
  39.  
  40. echo "›0 p"
  41.  
  42. set devs/system-configuration
  43.  
  44. ;  Restore the colours!
  45.  
  46. Type message
  47.  
  48.  
  49. ;  Whilst displaying the message, its time to transfer the used commands 
  50. ;  into a RAM: disk so that Newsflash operation is speeded up even further.
  51. ;  First we copy the contents of the S {Script} drawer containing all the
  52. ;  menus for the magazine...
  53.  
  54. copy s           to ram:
  55.  
  56. ;  Now we copy all the utility commands used during magazine operation..
  57.  
  58. copy c/ppmore    to ram:
  59. copy c/run       to ram:
  60. copy c/set       to ram:
  61. copy c/echo      to ram:
  62. copy c/powermenu to ram:
  63. copy c/copy      to ram:
  64.  
  65. ;  With that done its time to tell the Amiga to look for the C commands and
  66. ;  the Script files on the ram disk... This is done with the ASSIGN command
  67. ;  which gives a new 'logical device' for the Amiga to look at.. making the
  68. ;  Amiga get its commands from the ram disk has many advantages, the best
  69. ;  obviously being the reduced disk-access and far better speed of operation.
  70. ;  We have to tell the Amiga where the ASSIGN command is though due to us
  71. ;  moving the location of the C directory..
  72.  
  73. df0:c/assign c: ram:
  74. df0:c/assign s: ram:
  75.  
  76. ;  Ok, the Amiga knows where to look.. Lets get the show on the road..
  77.  
  78.  
  79. prog/zoomwindows quiet
  80. ; Another great utility to improve window display, enjoy it, special
  81. ; thanks Dr Maybe from Holland....
  82.  
  83. ; Lets run the Magazine routine itself..
  84. powermenu 
  85.  
  86. ;  There! All done, finished and executed.. Did you follow all that??
  87. ;  Sequence edited and scripted by Martyn [Spadge] in Nov 1989
  88. ;  From now on all startup-sequences will be written this way to show
  89. ;  new-users and beginners how things are done.. its not meant to be
  90. ;  a tutorial - just a high-level commentry of whats happening.
  91.  
  92. ;  This disk is distributed VIRUS FREE, if the Virus Hunter used on this
  93. ;  disk shows a Virus was present then you need a killer if you havent 
  94. ;  already got one. Contact us for the latest virus killers..
  95. ;  Thanks to the Pseudo Ops for sending their excellent killers.
  96.  
  97.